home *** CD-ROM | disk | FTP | other *** search
- /*
- ** wclreol.c
- **
- ** Pictor, Version 1.51, Copyright (c) 1992-94 SoftCircuits
- ** Redistributed by permission.
- */
-
- #include <stdio.h>
- #include "pictor.h"
-
-
- /*
- ** Clears from the current window pane column to the end of
- ** the current window pane line.
- */
- void wcleareol(void)
- {
- if(_PL_winhead != NULL) {
- if((unsigned)_CURR_WPANE.row < (unsigned)getwrows() &&
- (unsigned)_CURR_WPANE.column < (unsigned)getwcols()) {
-
- setvpos(_CURR_WPANE.top + _CURR_WPANE.row + 1,
- _CURR_WPANE.left + _CURR_WPANE.column + 1);
- vcolor(_CURR_WPANE.color);
- vrepc(' ',getwcols() - _CURR_WPANE.column);
- }
- }
-
- } /* wcleareol */
-